Draw                     Draws a Line from One Point to Another

 Draw(X1,Y1,X2,Y2,Color : Integer);                                      [TP]

    Draws a line from (X1,Y1) to (X2,Y2) in the indicated color.

           X1,Y1    Integer values; coordinates (column, row) of starting
                    point in pixels.

           X2,Y2    Integer values; coordinates (column, row) of ending
                    point in pixels.

           Color    Integer value; selects color from palette (See
                    Palette).

           Note:    The screen display must be in graphics mode to use
                    this procedure.

  -------------------------------- Example ---------------------------------

           GraphMode;
           Draw(40,25,200,125,1);   { from (40,25) to (200,125) }